home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / CADAR / Symbols / Ornamentation / sub-divide-with-melody < prev   
Text File  |  1998-10-22  |  843b  |  25 lines
  1. sub-divide-with-melody  
  2. div min max length-list melody
  3. &key (seed nil) (type :list) (pcnt 100)
  4. (groups '(2 3)) (rnd-type 'gauss) (step '(1))
  5. (step-type 'norm) (m-type :rnd) (to-pcnt nil))
  6.  
  7. legal types :list :flat
  8. legal rnd-types 'gauss 'norm
  9. legal step-types 'norm 'change
  10. legal m-types :rep :rnd
  11.  
  12. this is the same as sub-divide-rhythm witch you can read
  13. about but with rnd-ornament (witch you can also read about)
  14. added to a combined function:
  15.  
  16.  
  17.  
  18. (sub-divide-with-melody '1/8 '1/4  '2/1 
  19.  '(1/1 1/4 1/2 7/8 3/8 5/16 9/8 5/4 3/32) 
  20.  '(a b c) :seed 0.1 :groups '(2 3) 
  21.                 :pcnt 100 :type :list :rnd-type 'norm
  22. :step '(2 3) :step-type 'change :m-type :rnd :to-pcnt 80)
  23.  
  24. ->(((3/8 3/8 2/8) 1/4 (2/8 2/8) (3/8 2/8 2/8) 3/8 5/16 (2/8 2/8 3/8 2/8) (3/8 3/8 2/8 2/8) 3/32) ((a c a) (b) (c e) (a -d a) (b) (c) (a -c a -c) (b e h e) (c)))
  25.